home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fritz: All Fritz
/
All Fritz.zip
/
All Fritz
/
FILES
/
WORDMISC
/
MICROSPL.LZH
/
IBMPC.C
< prev
next >
Wrap
C/C++ Source or Header
|
1987-07-21
|
2KB
|
96 lines
/* IBMPC: IBMPC I/O routines for MicroSPELL 1.0
Spell Checker and Corrector
(C)opyright May 1987 by Daniel Lawrence
All Rights Reserved
*/
#include <stdio.h>
#include "dopt.h"
#include "dstruct.h"
#include "ddef.h"
#if IBMPC
union REGS rg; /* cpu register for use of DOS calls */
TTopen() /* open the IBM-PC screen */
{
return(TRUE);
}
TTclose() /* close the IBM-PC screen */
{
return(TRUE);
}
TTkopen() /* open the keyboard */
{
return(TRUE);
}
TTkclose() /* close the keyboard */
{
return(TRUE);
}
TTgetc(c) /* get a character from the keyboard */
char c; /* character to print */
{
/* call the dos to get a char */
rg.h.ah = 7; /* dos Direct Console Input call */
intdos(&rg, &rg);
c = rg.h.al; /* grab the char */
return(c & 255);
}
TTputc(c)
char c; /* character to print */
{
bdos(6, c, 0);
}
TTflush() /* flush the I/O (nop) */
{
return(TRUE);
}
TTmove(row, col) /* move cursor to location on screen */
int row, col;
{
rg.h.ah = 2; /* set cursor position function code */
rg.h.dl = col;
rg.h.dh = row;
rg.h.bh = 0; /* set screen page number */
int86(0x10, &rg, &rg);
}
TTbeep() /* ring the bell */
{
TTputc(7);
}
#if 0
#define TTeeol (*term.t_eeol)
#define TTeeop (*term.t_eeop)
#define TTrev (*term.t_rev)
#define TTrez (*term.t_rez)
#if COLOR
#define TTforg (*term.t_setfor)
#define TTbacg (*term.t_setback)
#endif
#endif
#endif